home *** CD-ROM | disk | FTP | other *** search
- <?xml version="1.0" encoding="utf-8" ?>
- <!DOCTYPE background PUBLIC "-//Apple, Inc.//DTD background V 2.0//EN" "" >
- <background>
- <id>5181</id>
- <filler1>0</filler1>
- <bitmap>BMAP_5672.pbm</bitmap>
- <cantDelete> <true /> </cantDelete>
- <showPict> <true /> </showPict>
- <dontSearch> <false /> </dontSearch>
- <link rel="stylesheet" type="text/css" href="stylesheet_3099.css" />
- <part>
- <id>1</id>
- <type>button</type>
- <visible> <true /> </visible>
- <reserved5> 0 </reserved5>
- <reserved4> 0 </reserved4>
- <reserved3> 0 </reserved3>
- <reserved2> 0 </reserved2>
- <reserved1> 0 </reserved1>
- <enabled> <true /> </enabled>
- <rect>
- <left>473</left>
- <top>1</top>
- <right>511</right>
- <bottom>22</bottom>
- </rect>
- <style>transparent</style>
- <showName> <false /> </showName>
- <highlight> <false /> </highlight>
- <autoHighlight> <true /> </autoHighlight>
- <sharedHighlight> <true /> </sharedHighlight>
- <family>0</family>
- <titleWidth>0</titleWidth>
- <icon>21700</icon>
- <textAlign>center</textAlign>
- <font>Chicago</font>
- <textSize>12</textSize>
- <textStyle>plain</textStyle>
- <name>New Button</name>
- <script>on mouseUp
- global balloonwastrue
- balloon
- if the result is not empty then
- play "Click"
- show menuBar
- go Home
- else
- play "Click"
- answer "Do you want balloon help turned off?" with "Yes" or "No"
- if it = "Yes" then
- balloon false
- put false into balloonwastrue
- show menuBar
- go Home
- else
- show menuBar
- go Home
- end if
- end if
- pass mouseUp
- end mouseUp
-
- on mousewithin
- balloon "Click this button to go Home."
- end mousewithin
- </script>
- </part>
- <part>
- <id>2</id>
- <type>button</type>
- <visible> <true /> </visible>
- <reserved5> 0 </reserved5>
- <reserved4> 0 </reserved4>
- <reserved3> 0 </reserved3>
- <reserved2> 0 </reserved2>
- <reserved1> 0 </reserved1>
- <enabled> <true /> </enabled>
- <rect>
- <left>0</left>
- <top>320</top>
- <right>28</right>
- <bottom>342</bottom>
- </rect>
- <style>transparent</style>
- <showName> <false /> </showName>
- <highlight> <false /> </highlight>
- <autoHighlight> <true /> </autoHighlight>
- <sharedHighlight> <true /> </sharedHighlight>
- <family>0</family>
- <titleWidth>0</titleWidth>
- <icon>19381</icon>
- <textAlign>center</textAlign>
- <font>Chicago</font>
- <textSize>12</textSize>
- <textStyle>plain</textStyle>
- <name>New Button</name>
- <script>on mouseup
- global balloonwastrue
- play "Click"
- balloon
- if the result is not empty then
- lock screen
- go previous
- unlock screen with visual effect wipe right
- else
- put true into balloonwastrue
- lock screen
- go previous
- unlock screen with visual effect wipe right
- end if
- pass mouseUp
- end mouseUp
-
- on mousewithin
- balloon "Click this button to go to the previous card."
- end mousewithin
-
- </script>
- </part>
- <part>
- <id>3</id>
- <type>button</type>
- <visible> <true /> </visible>
- <reserved5> 0 </reserved5>
- <reserved4> 0 </reserved4>
- <reserved3> 0 </reserved3>
- <reserved2> 0 </reserved2>
- <reserved1> 0 </reserved1>
- <enabled> <true /> </enabled>
- <rect>
- <left>28</left>
- <top>320</top>
- <right>58</right>
- <bottom>342</bottom>
- </rect>
- <style>transparent</style>
- <showName> <false /> </showName>
- <highlight> <false /> </highlight>
- <autoHighlight> <true /> </autoHighlight>
- <sharedHighlight> <true /> </sharedHighlight>
- <family>0</family>
- <titleWidth>0</titleWidth>
- <icon>22308</icon>
- <textAlign>center</textAlign>
- <font>Chicago</font>
- <textSize>12</textSize>
- <textStyle>plain</textStyle>
- <name>New Button</name>
- <script>on mouseUp
- global balloonwastrue
- play "Click"
- balloon
- if the result is not empty then
- lock screen
- go next
- unlock screen with visual effect wipe left
- else
- put true into balloonwastrue
- lock screen
- go next
- unlock screen with visual effect wipe left
- end if
- pass mouseup
- end mouseUp
-
- on mousewithin
- balloon "Click this button to go the the next card."
- end mousewithin
- </script>
- </part>
- <part>
- <id>4</id>
- <type>button</type>
- <visible> <true /> </visible>
- <reserved5> 0 </reserved5>
- <reserved4> 0 </reserved4>
- <reserved3> 0 </reserved3>
- <reserved2> 0 </reserved2>
- <reserved1> 0 </reserved1>
- <enabled> <true /> </enabled>
- <rect>
- <left>131</left>
- <top>323</top>
- <right>164</right>
- <bottom>340</bottom>
- </rect>
- <style>shadow</style>
- <showName> <true /> </showName>
- <highlight> <false /> </highlight>
- <autoHighlight> <true /> </autoHighlight>
- <sharedHighlight> <true /> </sharedHighlight>
- <family>0</family>
- <titleWidth>0</titleWidth>
- <icon>0</icon>
- <textAlign>center</textAlign>
- <font>Geneva</font>
- <textSize>9</textSize>
- <textStyle>plain</textStyle>
- <name>Topics</name>
- <script>on mouseUp
- global balloonwastrue
- play "Click"
- balloon
- if the result is not empty then
- visual effect wipe right
- go to card id 25127
- else
- put true into balloonwastrue
- visual effect wipe right
- go to card id 25127
- end if
- end mouseUp
-
- on mousewithin
- balloon "Click this button to return to the Topics card."
- end mousewithin
-
- </script>
- </part>
- <part>
- <id>5</id>
- <type>field</type>
- <visible> <true /> </visible>
- <dontWrap> <false /> </dontWrap>
- <dontSearch> <false /> </dontSearch>
- <sharedText> <false /> </sharedText>
- <fixedLineHeight> <true /> </fixedLineHeight>
- <autoTab> <false /> </autoTab>
- <lockText> <true /> </lockText>
- <rect>
- <left>24</left>
- <top>50</top>
- <right>251</right>
- <bottom>311</bottom>
- </rect>
- <style>scrolling</style>
- <autoSelect> <false /> </autoSelect>
- <showLines> <false /> </showLines>
- <wideMargins> <true /> </wideMargins>
- <multipleLines> <false /> </multipleLines>
- <reservedFamily> 0 </reservedFamily>
- <titleWidth>0</titleWidth>
- <icon>0</icon>
- <textAlign>left</textAlign>
- <font>Times</font>
- <textSize>12</textSize>
- <textStyle>plain</textStyle>
- <textHeight>16</textHeight>
- <name>1</name>
- <script>--Original Export Text Function by Gary Bond
- --Copyright 1987 by Apple Computer, Inc.
- --Rev 3.6
-
- on mouseup
- if the clickText is not empty then
- checkballoon
- select the clickChunk
- play "Click"
- put the clickText into textstuff
- answer "Do you want to append this verse to an existing file or create a new file?" with "Append" or "New File" or "Cancel"
- if it = "Cancel" then
- select empty
- exit mouseup
- else
- if it = "New File" then
- ask file "Name the file to output verse to..." with "Verse File"
- if it is empty then
- select empty
- exit mouseup
- else put it into Fname
- open file Fname
- write textstuff & return to file Fname
- close file Fname
- get ChangeFileType(Fname, "TEXT","ttxt")
- else
- answer file "Choose a file to append this verse to..." of type "TEXT"
- if it is empty then
- select empty
- exit mouseup
- else
- put it into Fname
- put empty into InText
- open file Fname
- write return & textstuff to file Fname at eof
- close file Fname
- end if
- end if
- end if
- select empty
- else
- exit mouseup
- end if
- pass mouseup
- end mouseup
-
- on mouseWithin
- balloon "Click on a verse to export it to a text file."
- global scrolllock
- if scrolllock is true
- then
- if scroll of bg fld "2" is not scroll of bg fld "1"
- then
- lock screen
- set scroll of bg fld "2" to scroll of bg fld "1"
- unlock screen
- end if
- end if
- end mouseWithin
-
- on checkballoon
- global balloonwastrue
- balloon
- if the result is not empty then
- exit checkballoon
- else
- put true into balloonwastrue
- exit checkballoon
- end if
- end checkballoon
-
- </script>
- </part>
- <part>
- <id>6</id>
- <type>field</type>
- <visible> <true /> </visible>
- <dontWrap> <false /> </dontWrap>
- <dontSearch> <false /> </dontSearch>
- <sharedText> <false /> </sharedText>
- <fixedLineHeight> <true /> </fixedLineHeight>
- <autoTab> <false /> </autoTab>
- <lockText> <true /> </lockText>
- <rect>
- <left>259</left>
- <top>50</top>
- <right>487</right>
- <bottom>311</bottom>
- </rect>
- <style>scrolling</style>
- <autoSelect> <false /> </autoSelect>
- <showLines> <false /> </showLines>
- <wideMargins> <true /> </wideMargins>
- <multipleLines> <false /> </multipleLines>
- <reservedFamily> 0 </reservedFamily>
- <titleWidth>0</titleWidth>
- <icon>0</icon>
- <textAlign>left</textAlign>
- <font>Times</font>
- <textSize>12</textSize>
- <textStyle>plain</textStyle>
- <textHeight>16</textHeight>
- <name>2</name>
- <script>--Original Export Text Function by Gary Bond
- --Copyright 1987 by Apple Computer, Inc.
- --Rev 3.6
-
- on mouseup
- if the clickText is not empty then
- checkballoon
- select the clickChunk
- play "Click"
- put the clickText into textstuff
- answer "Do you want to append this verse to an existing file or create a new file?" with "Append" or "New File" or "Cancel"
- if it = "Cancel" then
- select empty
- exit mouseup
- else
- if it = "New File" then
- ask file "Name the file to output verse to..." with "Verse File"
- if it is empty then
- select empty
- exit mouseup
- else put it into Fname
- open file Fname
- write textstuff & return to file Fname
- close file Fname
- get ChangeFileType(Fname, "TEXT","ttxt")
- else
- answer file "Choose a file to append this verse to..." of type "TEXT"
- if it is empty then
- select empty
- exit mouseup
- else
- put it into Fname
- put empty into InText
- open file Fname
- write return & textstuff to file Fname at eof
- close file Fname
- end if
- end if
- end if
- select empty
- else
- exit mouseup
- end if
- pass mouseup
- end mouseup
-
- on mouseWithin
- balloon "Click on a verse to export it to a text file."
- global scrolllock
- if scrolllock is true
- then
- if scroll of bg fld "1" is not scroll of bg fld "2"
- then
- lock screen
- set scroll of bg fld "1" to scroll of bg fld "2"
- unlock screen
- end if
- end if
- end mouseWithin
-
- on checkballoon
- global balloonwastrue
- balloon
- if the result is not empty then
- exit checkballoon
- else
- put true into balloonwastrue
- exit checkballoon
- end if
- end checkballoon</script>
- </part>
- <part>
- <id>14</id>
- <type>button</type>
- <visible> <true /> </visible>
- <reserved5> 0 </reserved5>
- <reserved4> 0 </reserved4>
- <reserved3> 0 </reserved3>
- <reserved2> 0 </reserved2>
- <reserved1> 0 </reserved1>
- <enabled> <true /> </enabled>
- <rect>
- <left>200</left>
- <top>323</top>
- <right>222</right>
- <bottom>340</bottom>
- </rect>
- <style>shadow</style>
- <showName> <true /> </showName>
- <highlight> <false /> </highlight>
- <autoHighlight> <true /> </autoHighlight>
- <sharedHighlight> <true /> </sharedHighlight>
- <family>0</family>
- <titleWidth>0</titleWidth>
- <icon>0</icon>
- <textAlign>center</textAlign>
- <font>Geneva</font>
- <textSize>9</textSize>
- <textStyle>plain</textStyle>
- <name>Quit</name>
- <script>on mouseUp
- global balloonwastrue
- balloon
- if the result is not empty then
- play "Click"
- doMenu "Quit Hypercard"
- else
- play "Click"
- answer "Do you want balloon help turned off?" with "Yes" or "No"
- if it = "Yes" then
- balloon false
- put false into balloonwastrue
- doMenu "Quit Hypercard"
- else
- doMenu "Quit Hypercard"
- end if
- end if
- pass mouseUp
- end mouseUp
-
- on mousewithin
- balloon "Click this button to Quit Hypercard."
- end mousewithin
- </script>
- </part>
- <part>
- <id>16</id>
- <type>button</type>
- <visible> <true /> </visible>
- <reserved5> 0 </reserved5>
- <reserved4> 0 </reserved4>
- <reserved3> 0 </reserved3>
- <reserved2> 0 </reserved2>
- <reserved1> 0 </reserved1>
- <enabled> <true /> </enabled>
- <rect>
- <left>165</left>
- <top>323</top>
- <right>199</right>
- <bottom>340</bottom>
- </rect>
- <style>shadow</style>
- <showName> <true /> </showName>
- <highlight> <false /> </highlight>
- <autoHighlight> <true /> </autoHighlight>
- <sharedHighlight> <true /> </sharedHighlight>
- <family>0</family>
- <titleWidth>0</titleWidth>
- <icon>0</icon>
- <textAlign>center</textAlign>
- <font>Geneva</font>
- <textSize>9</textSize>
- <textStyle>plain</textStyle>
- <name>Export</name>
- <script>--Original Export Text Function by Gary Bond
- --Copyright 1987 by Apple Computer, Inc.
- --Rev 3.6
-
- on mouseUp
- play "Click"
- answer "Which version of the verses for the topic of '"&the short name of this card&"' do you want to export?" with "King James" or "NIV" or "Both"
- if it = "King James" then
- kingjames
- else
- if it = "NIV" then
- niv
- else
- both
- end if
- end if
- end mouseUp
-
- on niv
- ask file "Name the file you wish to export the verses to..." with "NIV File"
- if it is empty then
- exit niv
- else
- put it into Fname
- open file Fname
- write "NIV Version" & return to file Fname
- write field "2" to file Fname
- close file Fname
- get ChangeFileType(Fname, "TEXT","ttxt")
- end if
- end niv
-
-
- on kingjames
- ask file "Name the file you wish to export the verses to..." with "King James File"
- if it is empty then
- exit kingjames
- else
- put it into Fname
- open file Fname
- write "King James Version" & return to file Fname
- write field "1" to file Fname
- close file Fname
- get ChangeFileType(Fname, "TEXT","ttxt")
- end if
- end kingjames
-
- on both
- ask file "Name the file you wish to export the verses to..."
- if it is empty then
- exit both
- else
- put it into Fname
- open file Fname
- write "King James Version" & return to file Fname
- write field "1" & return & return to file Fname
- write "NIV Version" & return to file Fname
- write field "2" to file Fname
- close file Fname
- get ChangeFileType(Fname, "TEXT","ttxt")
- end if
- end both
-
- on mousewithin
- put the short name of this card into cardname
- balloon "Click this button to export all the verses for the" ¬
- & " topic of " &cardname& " from the King James Version, the NIV version" ¬
- & " , or both."
- end mousewithin
-
-
-
-
- </script>
- </part>
- <part>
- <id>17</id>
- <type>button</type>
- <visible> <true /> </visible>
- <reserved5> 0 </reserved5>
- <reserved4> 0 </reserved4>
- <reserved3> 0 </reserved3>
- <reserved2> 0 </reserved2>
- <reserved1> 0 </reserved1>
- <enabled> <true /> </enabled>
- <rect>
- <left>224</left>
- <top>323</top>
- <right>242</right>
- <bottom>342</bottom>
- </rect>
- <style>transparent</style>
- <showName> <false /> </showName>
- <highlight> <false /> </highlight>
- <autoHighlight> <true /> </autoHighlight>
- <sharedHighlight> <true /> </sharedHighlight>
- <family>0</family>
- <titleWidth>0</titleWidth>
- <icon>26635</icon>
- <textAlign>center</textAlign>
- <font>Chicago</font>
- <textSize>12</textSize>
- <textStyle>plain</textStyle>
- <name>New Button</name>
- <script>on mouseUp
- play "Click"
- global balloonwastrue
- balloon
- if the result is not empty then
- balloon true
- put true into balloonwastrue
- else
- balloon false
- put false into balloonwastrue
- end if
- pass mouseUp
- end mouseUp
-
-
- on mouseWithin
- balloon "Click this button to turn balloon help" ¬
- & " on or off."
- end mouseWithin</script>
- </part>
- <part>
- <id>19</id>
- <type>field</type>
- <visible> <true /> </visible>
- <dontWrap> <false /> </dontWrap>
- <dontSearch> <false /> </dontSearch>
- <sharedText> <false /> </sharedText>
- <fixedLineHeight> <false /> </fixedLineHeight>
- <autoTab> <false /> </autoTab>
- <lockText> <true /> </lockText>
- <rect>
- <left>132</left>
- <top>0</top>
- <right>373</right>
- <bottom>20</bottom>
- </rect>
- <style>transparent</style>
- <autoSelect> <false /> </autoSelect>
- <showLines> <false /> </showLines>
- <wideMargins> <false /> </wideMargins>
- <multipleLines> <false /> </multipleLines>
- <reservedFamily> 0 </reservedFamily>
- <titleWidth>0</titleWidth>
- <icon>0</icon>
- <textAlign>center</textAlign>
- <font>Times</font>
- <textSize>16</textSize>
- <textStyle>shadow</textStyle>
- <textStyle>bold</textStyle>
- <textHeight>21</textHeight>
- <name>card title</name>
- <script></script>
- </part>
- <part>
- <id>21</id>
- <type>field</type>
- <visible> <true /> </visible>
- <dontWrap> <false /> </dontWrap>
- <dontSearch> <false /> </dontSearch>
- <sharedText> <false /> </sharedText>
- <fixedLineHeight> <false /> </fixedLineHeight>
- <autoTab> <false /> </autoTab>
- <lockText> <true /> </lockText>
- <rect>
- <left>61</left>
- <top>30</top>
- <right>219</right>
- <bottom>50</bottom>
- </rect>
- <style>transparent</style>
- <autoSelect> <false /> </autoSelect>
- <showLines> <false /> </showLines>
- <wideMargins> <false /> </wideMargins>
- <multipleLines> <false /> </multipleLines>
- <reservedFamily> 0 </reservedFamily>
- <titleWidth>0</titleWidth>
- <icon>0</icon>
- <textAlign>left</textAlign>
- <font>Times</font>
- <textSize>18</textSize>
- <textStyle>plain</textStyle>
- <textHeight>24</textHeight>
- <name>KJV</name>
- <script></script>
- </part>
- <part>
- <id>22</id>
- <type>field</type>
- <visible> <true /> </visible>
- <dontWrap> <false /> </dontWrap>
- <dontSearch> <false /> </dontSearch>
- <sharedText> <false /> </sharedText>
- <fixedLineHeight> <false /> </fixedLineHeight>
- <autoTab> <false /> </autoTab>
- <lockText> <true /> </lockText>
- <rect>
- <left>274</left>
- <top>31</top>
- <right>475</right>
- <bottom>49</bottom>
- </rect>
- <style>transparent</style>
- <autoSelect> <false /> </autoSelect>
- <showLines> <false /> </showLines>
- <wideMargins> <false /> </wideMargins>
- <multipleLines> <false /> </multipleLines>
- <reservedFamily> 0 </reservedFamily>
- <titleWidth>0</titleWidth>
- <icon>0</icon>
- <textAlign>left</textAlign>
- <font>Times</font>
- <textSize>18</textSize>
- <textStyle>plain</textStyle>
- <textHeight>24</textHeight>
- <name>NIV</name>
- <script></script>
- </part>
- <part>
- <id>26</id>
- <type>button</type>
- <visible> <true /> </visible>
- <reserved5> 0 </reserved5>
- <reserved4> 0 </reserved4>
- <reserved3> 0 </reserved3>
- <reserved2> 0 </reserved2>
- <reserved1> 0 </reserved1>
- <enabled> <true /> </enabled>
- <rect>
- <left>57</left>
- <top>323</top>
- <right>130</right>
- <bottom>340</bottom>
- </rect>
- <style>shadow</style>
- <showName> <true /> </showName>
- <highlight> <false /> </highlight>
- <autoHighlight> <true /> </autoHighlight>
- <sharedHighlight> <true /> </sharedHighlight>
- <family>0</family>
- <titleWidth>0</titleWidth>
- <icon>0</icon>
- <textAlign>center</textAlign>
- <font>Geneva</font>
- <textSize>9</textSize>
- <textStyle>plain</textStyle>
- <name>Scroll Unlocked</name>
- <script>on mouseUp
- global scrolllock
- play "Click"
- if the short name of bg button id 26 is "Scroll Unlocked"
- then
- put true into scrolllock
- Set the name of bg button id 26 to "Scroll Locked"
- else
- put false into scrolllock
- Set the name of bg button id 26 to "Scroll Unlocked"
- end if
- end mouseUp
-
- on mousewithin
- balloon "Click this button to syncronize or unsyncronize" ¬
- & " the verse scrolling fields."
- end mousewithin
- </script>
- </part>
- <name>Verse Background</name>
- <script>on idle
- pass idle
- end idle
-
- on openBackground
- global scrolllock
- lock screen
- if the short name of bg button id 26 is "Scroll Unlocked"
- then
- put false into scrolllock
- else
- put false into scrolllock
- Set the name of bg button id 26 to "Scroll Unlocked"
- end if
- set the scroll of bg field "1" to 0
- set the scroll of bg field "2" to 0
- put "King James Version" into bg field "KJV"
- put "New International Version" into bg field "NIV"
- put the short name of this card into theName
- put theName into bg field "card title"
- unlock screen
- pass openBackground
- end openBackground
-
- on openCard
- global balloonwastrue
- if balloonwastrue = "true" then
- balloon true
- put 0 into balloonwastrue
- else
- end if
- lock screen
- set the scroll of bg field "1" to 0
- set the scroll of bg field "2" to 0
- put "King James Version" into bg field "KJV"
- put "New International Version" into bg field "NIV"
- put the short name of this card into theName
- put theName into bg field "card title"
- unlock screen
- pass openCard
- end openCard
-
- on resumecard
- global balloonwastrue
- if balloonwastrue = "true" then
- balloon true
- put 0 into balloonwastrue
- else
- end if
- pass resumecard
- end resumecard
-
- </script>
- </background>
-